;;----------vimascript
[@Castle_Manager_TAOSUNG]
{
#IF
IsCastleGuild [TAOSUNG]
IsGuildMaster
#SAY
ɳĮǽ : <$CS_TAOSUNG_CASTLEGOLD> \
ɳĮǽ˰ : <$CS_TAOSUNG_TODAYTAX> \\

<趨ʾ/@setonlinenotice>\\
#IF
IsCastleGuild [TAOSUNG]
IsGuildMaster
!IsOnCastleWar [TAOSUNG]
#SAY
<ȡɳĮ˰/@@DrawTax> \\
<ȡĩ֮/@lingquyingmeitu>\\
#IF
!IsOnCastleWar [TAOSUNG]
IsCastleGuild [TAOSUNG]
#SAY
<ȡǵĶ˰/@lingqusx1>\\

#IF
#ACT
MOV D0 0
loadvalue D0 "ϵͳ.INI"  ɳĮǹʱ

#if
Esmall D0 %CURHOUR
#say
<鿴սճ̡/@view_warschedule>\
<빥ս/@Propse_CastleWar>\
<˽һ¹ս/@requestcastlewar> \\
ͬ{FCOLOR/10}<$NPCNAME>{FCOLOR/12} <Ի/@TalkToQuest>\\
<  /@exit>\\

#elsesay
ʱɳĮǹս!\
ͬ{FCOLOR/10}<$NPCNAME>{FCOLOR/12} <Ի/@TalkToQuest>\\
<  /@exit>\\

[@@DrawTax]
#IF
!IsOnCastleWar [TAOSUNG]
#ACT
mov D1 %TAOSUNGGOLD
mov D2 %INPUTNUM
goto @DrawTax
#ELSEACT
break
#ELSESAY
ΪǹԲȡ\\
<  /@exit>

[@DrawTax]
#IF
large D2 %D1
or small d2 1
#SAY
Ϊ̫޷ȡ\\
<  /@exit>
#ELSESAY
ȡ<$OUTPUT(D2)>\\
<  /@exit>
#ELSEACT
mov P9 1
makelog 62 9999 %D2 %NPCNAME
GetBackCastleGold [TAOSUNG] %d2

[@Propse_CastleWar]
#ACT
ReadValueSql "TBL_TaoSungCastleWar" "FLD_TAOSUNG='TAOSUNG'" "FLD_PAGUNSUNGGUILD" [@Propse_CastleWar_0]

[@Propse_CastleWar_0()]
#ACT
mov A1 %ARG(1)

#IF
!IsOnCastleWar [TAOSUNG]
IsGuildMaster
!IsCastleGuild [TAOSUNG]
!IsCastleGuild [SABUK]
CanProposeCastleWar [TAOSUNG]
Equal A1 %guildname
#ACT
goto @Propse_CastleWar_Pagunsung
break

#IF
IsOnCastleWar [TAOSUNG]
#SAY
ʱ빥ս\\
<ǰһ/@main>
#ACT
break

#IF
!IsGuildMaster
#SAY
˲ܽ롣\\
<ǰһ/@main>
#ACT
break

#IF
IsCastleGuild [TAOSUNG]
#SAY
л᲻ܽй\\
<ǰһ/@main>
#ACT
break

#IF
IsCastleGuild [SABUK]
#SAY
л᲻ܽй\\
<ǰһ/@main>
#ACT
break

#IF
!checkitem ַ 1
#SAY
ûַ빥ս\\
<ǰһ/@main>
#ACT
break

#IF
CanProposeCastleWar [TAOSUNG]
#ACT
ProposeCastleWar [TAOSUNG]
take ַ 1
#SAY
˹ս\\
{FCOLOR/10}3պ8{FCOLOR/12}սʼ\\
<ǰһ/@main>
#ELSESAY
Ϊ޷롣\\
<ǰһ/@main>

[@Propse_CastleWar_Pagunsung]
#ACT
ProposeCastleWar [TAOSUNG]
UpdateValueSql "TBL_TaoSungCastleWar" "FLD_TAOSUNG='TAOSUNG'" "FLD_PAGUNSUNGGUILD='NULL'"
#SAY
ΪǰȺֵĹûַҲһᡣ\
빥ս\\
{FCOLOR/10}3պ8{FCOLOR/12}սʼ\\
<ǰһ/@main>

[@requestcastlewar]
#SAY
빥սҪַ?\
Ļ{FCOLOR/10}3պ8{FCOLOR/12}սʼ\\
<ǰһ/@main>

[@view_warschedule]
#SAY
ɳĮǹսճͬ¡\
{FCOLOR/10}<$CS_TAOSUNG_WARDATE>{FCOLOR/12} \\
<ǰһ/@main>

[@lingqusx1]
#CALL [Vimascript\.txt] @˰

[@lingquyingmeitu]
#IF
IsCastleGuild [TAOSUNG]
IsGuildMaster
checkgold 30000000
#ACT
take  30000000
give ĩ֮У
#SAY
ϲΪѿõӵ3Իӵ10%ļʺӶԷħͷ\\
ʧȥϵͳջظҲ޷.\
Զ䣬㶪Ȼ.\
ѵļƷ.\\
<ر/@exit>

[@setonlinenotice]
#IF
#SAY
<趨ʾ/@setonlineon>\
<趨ʾر/@setonlineoff>\


[@setonlineon]
#ACT
set [598] 0

[@setonlineoff]
#ACT
set [598] 1


}
;;Ҫɾ